home *** CD-ROM | disk | FTP | other *** search
/ Trading on the Edge / Trading On The Edge - CD-ROM Toolkit (Wayzata Technology)(2031)(1994).bin / pc / mac_file / vendor_d / neuralwa / nw2v50 / grnbcoef.igb < prev    next >
Text File  |  1993-08-23  |  2KB  |  80 lines
  1. inst4.1     !Nov, 1992
  2. !****************************************************************
  3. !*                                *
  4. !*    B Coefficient                        *
  5. !*                                *
  6. !****************************************************************
  7. !
  8.  
  9. @LLsl                !Load super-layer
  10. =n0    Lpes            !Number of layers
  11. =LayN    0
  12.  
  13. ! Look for first layer that learns
  14.  
  15. :Koh1
  16. +LayN    1            !next layer
  17. ?LayN    n0
  18. >bgt    KohEnd            !past output layer
  19. @LLly                !load the layer
  20. ?Llrn    0            !is this a preprocessing layer?
  21. >bne    Koh2            !we are past the preprocessing layers
  22. >br    Koh1            !next layer
  23.  
  24. :Koh2
  25. =n4    Lpes            !number of PEs in the pattern layer
  26.  
  27. !Next layer is Summation/Divisor layer
  28. +LayN    1            !next layer
  29. @LLly                !load the layer
  30. =NPEl    LayN            !set up as near (source) layer
  31. =NPEn    0            !First PE
  32.  
  33. ! Add probe
  34. =PNam    "BCoefs"        !probe name
  35. @PbAS                !Add Probe
  36. @PbDC                !Delete all components
  37. @NrPE                !Point to target PE
  38. @PAPE                !Add target PE to probe
  39.  
  40. ! Now build the instrument
  41. @ILdD                !load default instrument
  42. =ITit    "B Coefficients"    !Instrument title
  43. =IGTy    "Bar"            !Graph Type
  44. =IGVr    "Weight"        !Variable
  45. =ITTy    "RMS"            !RMS Transformation Type
  46. =ITMd    0            !No transformation
  47. =IEpc    0            !No epoch
  48.  
  49. =Ignx    n4
  50. =Inpl    n4
  51.  
  52. =Iwdt    4
  53. *Iwdt    n4
  54. ! At least 140 wide
  55. ?Iwdt    140
  56. >bgt    Koh4
  57. =Iwdt    140
  58. :Koh4
  59. =Ihgt    100
  60.  
  61. =Ivmn    0.0
  62.  
  63. =Ivmx    2.0
  64. /Ivmx    n4
  65.  
  66. =ILnA    1            !Active in Learn
  67. =IRcA    0            !Inactive in recall
  68. =ILDv    15            !Every 15 iterations
  69. =ILRm    0
  70. =IRDv    0
  71. =IRRm    0
  72. =IPrb    PNam            !Point to probe
  73. =ICAc    0            !Convergence criterion inactive
  74. =ICTh    0.0            !Convergence Threshold
  75. !Let NeuralWorks figure out where to put instrument
  76. =x    0
  77. =y    0
  78. @IAdd                !Now create instrument
  79. :KohEnd
  80.